object FrmCadTarefa: TFrmCadTarefa
  Left = 381
  Top = 194
  Width = 710
  Height = 416
  Caption = 'Tarefa'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 349
    Width = 694
    Height = 29
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object cxButton2: TcxButton
      Left = 88
      Top = 2
      Width = 75
      Height = 25
      Action = ActESC
      TabOrder = 1
    end
    object cxButton1: TcxButton
      Left = 8
      Top = 2
      Width = 75
      Height = 25
      Action = ActSave
      TabOrder = 0
    end
  end
  object cxPageControl1: TcxPageControl
    Left = 0
    Top = 0
    Width = 694
    Height = 169
    ActivePage = cxTabSheet1
    Align = alTop
    TabOrder = 1
    ClientRectBottom = 164
    ClientRectLeft = 5
    ClientRectRight = 689
    ClientRectTop = 28
    object cxTabSheet1: TcxTabSheet
      Caption = 'Cadastro'
      ImageIndex = 0
      object cxDBTextEdit4: TcxDBTextEdit
        Left = 4
        Top = 90
        DataBinding.DataField = 'OBS'
        DataBinding.DataSource = dtsEdit
        Properties.CharCase = ecUpperCase
        TabOrder = 8
        Width = 577
      end
      object cxLabel8: TcxLabel
        Left = 3
        Top = 73
        Caption = 'Descri'#231#227'o'
        ParentFont = False
        Transparent = True
      end
      object cbResponsavel: TcxDBLookupComboBox
        Left = 3
        Top = 53
        DataBinding.DataField = 'USUARIO'
        DataBinding.DataSource = dtsEdit
        Properties.CharCase = ecUpperCase
        Properties.KeyFieldNames = 'codigo'
        Properties.ListColumns = <
          item
            FieldName = 'NomeFuncCaixa'
          end>
        Properties.ListSource = dsUsuario1
        TabOrder = 3
        Width = 276
      end
      object btnUsuario: TcxButtonEdit
        Left = 278
        Top = 53
        TabStop = False
        Properties.Buttons = <
          item
            Caption = 'F9'
            Default = True
            Kind = bkText
          end>
        Properties.ViewStyle = vsButtonsOnly
        TabOrder = 10
        Text = 'btnResponsavel'
        OnClick = btnUsuarioClick
        Width = 25
      end
      object cxDBDateEdit1: TcxDBDateEdit
        Left = 307
        Top = 53
        DataBinding.DataField = 'DATA_AGENDA'
        DataBinding.DataSource = dtsEdit
        TabOrder = 4
        Width = 105
      end
      object cxDBTimeEdit2: TcxDBTimeEdit
        Left = 416
        Top = 53
        DataBinding.DataField = 'HORA_AGENDA'
        DataBinding.DataSource = dtsEdit
        TabOrder = 5
        Width = 81
      end
      object cxDBSpinEdit1: TcxDBSpinEdit
        Left = 500
        Top = 53
        DataBinding.DataField = 'PRIORIDADE'
        DataBinding.DataSource = dtsEdit
        Properties.MaxValue = 5.000000000000000000
        Properties.MinValue = 1.000000000000000000
        TabOrder = 6
        Width = 81
      end
      object cxButton3: TcxButton
        Left = 586
        Top = 50
        Width = 75
        Height = 26
        Caption = 'CPF/CNPJ'
        TabOrder = 7
        TabStop = False
        OnClick = cxButton3Click
      end
      object cxLabel10: TcxLabel
        Left = 500
        Top = 37
        Caption = 'Prioridade'
        ParentFont = False
        Transparent = True
      end
      object cxLabel3: TcxLabel
        Left = 415
        Top = 37
        Caption = 'Hr. Agenda'
        ParentFont = False
        Transparent = True
      end
      object cxLabel4: TcxLabel
        Left = 307
        Top = 37
        Caption = 'Dt. Agenda'
        ParentFont = False
        Transparent = True
      end
      object cxLabel6: TcxLabel
        Left = 3
        Top = 37
        Caption = 'Respons'#225'vel'
        ParentFont = False
        Transparent = True
      end
      object cxDBTextEdit1: TcxDBTextEdit
        Left = 3
        Top = 16
        DataBinding.DataField = 'CODIGO'
        DataBinding.DataSource = dtsEdit
        Properties.ReadOnly = True
        TabOrder = 0
        Width = 60
      end
      object cbStatus: TcxDBLookupComboBox
        Left = 67
        Top = 16
        DataBinding.DataField = 'STATUS'
        DataBinding.DataSource = dtsEdit
        Properties.CharCase = ecUpperCase
        Properties.KeyFieldNames = 'codigo'
        Properties.ListColumns = <
          item
            FieldName = 'DESCRICAO'
          end>
        Properties.ListSource = dsStatus
        TabOrder = 1
        Width = 212
      end
      object btnStatus: TcxButtonEdit
        Left = 278
        Top = 16
        TabStop = False
        Properties.Buttons = <
          item
            Caption = 'F9'
            Default = True
            Kind = bkText
          end>
        Properties.ViewStyle = vsButtonsOnly
        TabOrder = 15
        Text = 'btnStatus'
        OnClick = btnStatusClick
        Width = 25
      end
      object cbCliente: TcxDBLookupComboBox
        Left = 306
        Top = 16
        DataBinding.DataField = 'CONTA'
        DataBinding.DataSource = dtsEdit
        Properties.CharCase = ecUpperCase
        Properties.KeyFieldNames = 'codigo'
        Properties.ListColumns = <
          item
            FieldName = 'cliente'
          end
          item
            FieldName = 'conta'
          end>
        Properties.ListSource = dsCliente
        TabOrder = 2
        Width = 345
      end
      object btnCliente: TcxButtonEdit
        Left = 646
        Top = 16
        TabStop = False
        Properties.Buttons = <
          item
            Caption = 'F9'
            Default = True
            Kind = bkText
          end>
        Properties.ViewStyle = vsButtonsOnly
        TabOrder = 16
        Text = 'btnCliente'
        OnClick = btnClienteClick
        Width = 25
      end
      object cxLabel1: TcxLabel
        Left = 306
        Top = 0
        Caption = 'Cliente'
        ParentFont = False
        Transparent = True
      end
      object cxLabel5: TcxLabel
        Left = 67
        Top = 0
        Caption = 'Status'
        ParentFont = False
        Transparent = True
      end
      object Label1: TcxLabel
        Left = 3
        Top = 0
        Caption = 'C'#243'digo'
        ParentFont = False
        Transparent = True
      end
      object cxButton4: TcxButton
        Left = 586
        Top = 88
        Width = 75
        Height = 26
        Caption = 'Pesquisas'
        TabOrder = 20
        TabStop = False
        OnClick = cxButton4Click
      end
      object cxLabel7: TcxLabel
        Left = 3
        Top = 118
        Caption = 'Atividades'
        ParentFont = False
        Transparent = True
      end
    end
    object cxTabSheet2: TcxTabSheet
      Caption = 'Observa'#231#245'es'
      ImageIndex = 1
      object cxDBMemo1: TcxDBMemo
        Left = 5
        Top = 5
        DataBinding.DataField = 'OBS_2'
        DataBinding.DataSource = dtsEdit
        TabOrder = 0
        Height = 188
        Width = 668
      end
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 169
    Width = 694
    Height = 180
    Align = alClient
    BevelOuter = bvNone
    Caption = 'Panel2'
    TabOrder = 2
    object Grid: TcxGrid
      Left = 0
      Top = 0
      Width = 694
      Height = 180
      Align = alClient
      TabOrder = 0
      object GridDBBandedTableView1: TcxGridDBBandedTableView
        NavigatorButtons.ConfirmDelete = False
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        Bands = <
          item
          end>
      end
      object TvAtividade: TcxGridDBBandedTableView
        OnKeyDown = TvAtividadeKeyDown
        NavigatorButtons.ConfirmDelete = False
        DataController.DataSource = dsAtividades
        DataController.Summary.DefaultGroupSummaryItems = <>
        DataController.Summary.FooterSummaryItems = <>
        DataController.Summary.SummaryGroups = <>
        OptionsBehavior.IncSearch = True
        OptionsData.CancelOnExit = False
        OptionsData.Deleting = False
        OptionsData.DeletingConfirmation = False
        OptionsData.Editing = False
        OptionsData.Inserting = False
        OptionsView.CellAutoHeight = True
        OptionsView.GroupByBox = False
        OptionsView.GroupFooters = gfAlwaysVisible
        OptionsView.BandHeaders = False
        Bands = <
          item
          end>
        object TvAtividadeTAREFA: TcxGridDBBandedColumn
          DataBinding.FieldName = 'TAREFA'
          Visible = False
          Position.BandIndex = 0
          Position.ColIndex = 0
          Position.RowIndex = 0
        end
        object TvAtividadeDATA: TcxGridDBBandedColumn
          DataBinding.FieldName = 'DATA'
          Width = 108
          Position.BandIndex = 0
          Position.ColIndex = 2
          Position.RowIndex = 0
        end
        object TvAtividadeUSUARIO: TcxGridDBBandedColumn
          DataBinding.FieldName = 'USUARIO'
          Visible = False
          Position.BandIndex = 0
          Position.ColIndex = 3
          Position.RowIndex = 0
        end
        object TvAtividadeDESCRICAO: TcxGridDBBandedColumn
          DataBinding.FieldName = 'DESCRICAO'
          PropertiesClassName = 'TcxRichEditProperties'
          Properties.AllowObjects = True
          Width = 367
          Position.BandIndex = 0
          Position.ColIndex = 4
          Position.RowIndex = 0
        end
        object TvAtividadeATIVIDADEScodigo: TcxGridDBBandedColumn
          DataBinding.FieldName = 'ATIVIDADES.codigo'
          Position.BandIndex = 0
          Position.ColIndex = 1
          Position.RowIndex = 0
        end
        object TvAtividadeTB_FUNCCAIXAcodigo: TcxGridDBBandedColumn
          DataBinding.FieldName = 'TB_FUNCCAIXA.codigo'
          Visible = False
          Position.BandIndex = 0
          Position.ColIndex = 5
          Position.RowIndex = 0
        end
        object TvAtividadeNomeFuncCaixa: TcxGridDBBandedColumn
          DataBinding.FieldName = 'NomeFuncCaixa'
          Width = 146
          Position.BandIndex = 0
          Position.ColIndex = 6
          Position.RowIndex = 0
        end
      end
      object GLATIVIDADE: TcxGridLevel
        GridView = TvAtividade
      end
    end
  end
  object dtEdit: TADOTable
    Active = True
    Connection = dmPrincipal.ADOConnection
    CursorType = ctStatic
    OnNewRecord = dtEditNewRecord
    TableName = 'TAREFAS'
    Left = 200
    Top = 8
    object dtEditCODIGO: TAutoIncField
      FieldName = 'CODIGO'
      ReadOnly = True
    end
    object dtEditDATA: TDateTimeField
      FieldName = 'DATA'
    end
    object dtEditHORA: TDateTimeField
      FieldName = 'HORA'
    end
    object dtEditUSUARIO: TIntegerField
      FieldName = 'USUARIO'
    end
    object dtEditSTATUS: TIntegerField
      FieldName = 'STATUS'
    end
    object dtEditDATA_AGENDA: TDateTimeField
      FieldName = 'DATA_AGENDA'
    end
    object dtEditHORA_AGENDA: TDateTimeField
      FieldName = 'HORA_AGENDA'
    end
    object dtEditOBS: TWideStringField
      DisplayLabel = 'Descri'#231#227'o'
      FieldName = 'OBS'
      Size = 200
    end
    object dtEditCONTA: TIntegerField
      FieldName = 'CONTA'
    end
    object dtEditUSUARIO_LACTO: TIntegerField
      FieldName = 'USUARIO_LACTO'
    end
    object dtEditOBS_2: TMemoField
      FieldName = 'OBS_2'
      BlobType = ftMemo
    end
    object dtEditPRIORIDADE: TIntegerField
      FieldName = 'PRIORIDADE'
    end
  end
  object dtsEdit: TDataSource
    DataSet = dtEdit
    Left = 440
  end
  object QryClientes: TADOQuery
    Connection = dmPrincipal.ADOConnection
    Parameters = <>
    SQL.Strings = (
      'SELECT codigo, conta, cliente'
      'FROM tb_conta;')
    Left = 285
    Top = 65529
    object QryClientescodigo: TAutoIncField
      FieldName = 'codigo'
      ReadOnly = True
    end
    object QryClientesconta: TWideStringField
      FieldName = 'conta'
      Size = 16
    end
    object QryClientescliente: TWideStringField
      FieldName = 'cliente'
      Size = 50
    end
  end
  object dsCliente: TDataSource
    DataSet = QryClientes
    Left = 405
    Top = 2
  end
  object QryStatus: TADOQuery
    Connection = dmPrincipal.ADOConnection
    Parameters = <>
    SQL.Strings = (
      'SELECT *'
      'FROM status;')
    Left = 469
    Top = 33
    object QryStatusCODIGO: TAutoIncField
      FieldName = 'CODIGO'
      ReadOnly = True
    end
    object QryStatusDESCRICAO: TWideStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
    object QryStatusCOR: TWideStringField
      FieldName = 'COR'
      Size = 50
    end
    object QryStatusFECHADO: TIntegerField
      FieldName = 'FECHADO'
    end
  end
  object dsStatus: TDataSource
    DataSet = QryStatus
    Left = 472
  end
  object dsUsuario1: TDataSource
    DataSet = qryUsuario1
    Left = 512
  end
  object qryUsuario1: TADOQuery
    Connection = dmPrincipal.ADOConnection
    Parameters = <>
    SQL.Strings = (
      'SELECT *'
      'FROM TB_FUNCCAIXA;')
    Left = 509
    Top = 33
    object qryUsuario1codigo: TAutoIncField
      FieldName = 'codigo'
      ReadOnly = True
    end
    object qryUsuario1MatriculaFuncCaixa: TWideStringField
      FieldName = 'MatriculaFuncCaixa'
      Size = 9
    end
    object qryUsuario1NomeFuncCaixa: TWideStringField
      FieldName = 'NomeFuncCaixa'
      Size = 40
    end
    object qryUsuario1CPFFuncCaixa: TWideStringField
      FieldName = 'CPFFuncCaixa'
      Size = 14
    end
    object qryUsuario1FuncaoCargo: TWideStringField
      FieldName = 'FuncaoCargo'
      Size = 50
    end
  end
  object qryUsuario2: TADOQuery
    Connection = dmPrincipal.ADOConnection
    Parameters = <>
    SQL.Strings = (
      'SELECT *'
      'FROM TB_FUNCCAIXA;')
    Left = 549
    Top = 33
    object qryUsuario2codigo: TAutoIncField
      FieldName = 'codigo'
      ReadOnly = True
    end
    object qryUsuario2MatriculaFuncCaixa: TWideStringField
      FieldName = 'MatriculaFuncCaixa'
      Size = 9
    end
    object qryUsuario2NomeFuncCaixa: TWideStringField
      FieldName = 'NomeFuncCaixa'
      Size = 40
    end
    object qryUsuario2CPFFuncCaixa: TWideStringField
      FieldName = 'CPFFuncCaixa'
      Size = 14
    end
    object qryUsuario2FuncaoCargo: TWideStringField
      FieldName = 'FuncaoCargo'
      Size = 50
    end
  end
  object dsUsuario2: TDataSource
    DataSet = qryUsuario2
    Left = 552
  end
  object ActionList1: TActionList
    Left = 352
    Top = 8
    object ActSave: TAction
      Caption = 'OK'
      ImageIndex = 22
      ShortCut = 121
      OnExecute = ActSaveExecute
    end
    object ActESC: TAction
      Caption = 'Cancelar'
      ShortCut = 27
      OnExecute = ActESCExecute
    end
    object ActCadLookup: TAction
      Caption = 'ActCadLookup'
      ShortCut = 120
      OnExecute = ActCadLookupExecute
    end
    object ActInsert: TAction
      Caption = 'ActInsert'
      ShortCut = 45
      OnExecute = ActInsertExecute
    end
    object ActEdit: TAction
      Caption = 'ActEdit'
      OnExecute = ActEditExecute
    end
  end
  object ACBrEnterTab1: TACBrEnterTab
    EnterAsTab = True
    Left = 592
    Top = 13
  end
  object QryAtividades: TADOQuery
    Connection = dmPrincipal.ADOConnection
    CursorType = ctStatic
    DataSource = dsLink
    Parameters = <
      item
        Name = 'codigo'
        Attributes = [paNullable]
        DataType = ftInteger
        NumericScale = 255
        Precision = 255
        Value = 7
      end>
    SQL.Strings = (
      
        'SELECT ATIVIDADES.TAREFA, ATIVIDADES.DATA, ATIVIDADES.USUARIO, A' +
        'TIVIDADES.DESCRICAO, ATIVIDADES.CODIGO, TB_FUNCCAIXA.codigo, TB_' +
        'FUNCCAIXA.NomeFuncCaixa'
      
        'FROM TB_FUNCCAIXA INNER JOIN ATIVIDADES ON TB_FUNCCAIXA.codigo=A' +
        'TIVIDADES.USUARIO'
      'WHERE (ATIVIDADES.TAREFA=:codigo)')
    Left = 589
    Top = 41
    object QryAtividadesTAREFA: TIntegerField
      DisplayLabel = 'C'#243'd. Tarefa'
      FieldName = 'TAREFA'
    end
    object QryAtividadesDATA: TDateTimeField
      DisplayLabel = 'Data'
      FieldName = 'DATA'
    end
    object QryAtividadesUSUARIO: TIntegerField
      DisplayLabel = 'C'#243'd. Usu'#225'rio'
      FieldName = 'USUARIO'
    end
    object QryAtividadesDESCRICAO: TMemoField
      DisplayLabel = 'Descri'#231#227'o'
      FieldName = 'DESCRICAO'
      BlobType = ftMemo
    end
    object QryAtividadesATIVIDADEScodigo: TAutoIncField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'ATIVIDADES.codigo'
      ReadOnly = True
    end
    object QryAtividadesTB_FUNCCAIXAcodigo: TAutoIncField
      DisplayLabel = 'Usr. C'#243'digo'
      FieldName = 'TB_FUNCCAIXA.codigo'
      ReadOnly = True
    end
    object QryAtividadesNomeFuncCaixa: TWideStringField
      DisplayLabel = 'Usu'#225'rio'
      FieldName = 'NomeFuncCaixa'
      Size = 40
    end
  end
  object dsAtividades: TDataSource
    DataSet = QryAtividades
    Left = 624
    Top = 16
  end
  object dsLink: TDataSource
    DataSet = dtEdit
    Left = 624
    Top = 48
  end
  object stgFrmCadTarefa: TcxPropertiesStore
    Components = <>
    StorageName = 'stgFrmCadTarefa'
    Left = 264
    Top = 116
  end
  object dtAtividade: TADOTable
    Connection = dmPrincipal.ADOConnection
    CursorType = ctStatic
    TableName = 'ATIVIDADES'
    Left = 248
    Top = 8
    object dtAtividadeTAREFA: TIntegerField
      FieldName = 'TAREFA'
    end
    object dtAtividadeDATA: TDateTimeField
      FieldName = 'DATA'
    end
    object dtAtividadeUSUARIO: TIntegerField
      FieldName = 'USUARIO'
    end
    object dtAtividadeDESCRICAO: TMemoField
      FieldName = 'DESCRICAO'
      BlobType = ftMemo
    end
    object dtAtividadeCODIGO: TAutoIncField
      FieldName = 'CODIGO'
      ReadOnly = True
    end
  end
end
